home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS Toolkit
/
BBS Toolkit.iso
/
wildcat
/
wcbbs.zip
/
BBSLIST.DOC
next >
Wrap
Text File
|
1993-02-17
|
7KB
|
198 lines
The following files are enclosed in this archive:
BBSLIST.EXE - The executable file.
BBSLIST.DOC - The file you are currently reading.
BBSLIST.PAS - Turbo Pascal source of the program.
BBSLIST.BAT - A partial listing of my nightly maintenance file
showing how to utilize this program on a multiline
system.
SYSOP.CFG - Master configuration file for program.
ques0001.DAT - questionaire data.
This program makes use of the questionaires that are available within
WildCat. It is very similar to a program written by Brandywine software.
The major advantage of this program is that it is FREEWARE and allows you to
make more use of WildCat's various color combinations. It will also generate
both a bulletin with WildCat color codes embedded and a straight ASCII file.
The program will accept a single command line parameter which consists of
the name/path of the SYSOP.CFG file or equivalent. The program will parse
the configuration file changing everything except the BBS name to uppercase
letters. If you are one of those types who insists on having a multicolored
name for your BBS, all you have to do is assign the color of the first
character in line 6 of the configuration file, then you can embed the other
normal WildCat codes within the actual BBS name. The program will pass it
along to the bulletin file with one detrimental effect, the text file will
also have these codes embedded within (sorry, but what can you expect of free
software.)
The following is the contents of the SYSOP.CFG file:
Knight's Bridge BBS
d:\wc30\ques\ques0001.000
d:\wc30\bull\bull7.bbs
g:\generic\text\bbslist.lst
0C
0B
02
07
0E
0F
* Legend for above *
Line 1 = The name of the BBS
Line 2 = Name of questionaire to fill out or master data file
Line 3 = Name of WildCat bulletin file N = Don't Use
Line 4 = Name of Text file N = Don't Use
Line 5 = Color of lines Format = Background/Foreground
Line 6 = Color of BBS name
Line 7 = Color of Flag line
Line 8 = Color of Title line
Line 9 = Color of first line of BBS listing
Line 10 = Color of Alternate line of BBS listing
* Background COLOR Chart * * Foreground COLOR Chart *
0 = Black 0 = Black
1 = Blue 1 = Blue
2 = Green 2 = Green
3 = Cyan 3 = Cyan
4 = Red 4 = Red
5 = Magenta 5 = Magenta
6 = Brown 6 = Brown
7 = White 7 = White
8 = Black (blinking foreground) 8 = Black (high intensity)
9 = Blue (blinking foreground) 9 = Blue (high intensity)
A = Green (blinking foreground) A = Green (high intensity)
B = Cyan (blinking foreground) B = Cyan (high intensity)
C = Red (blinking foreground) C = Red (high intensity)
D = Magenta (blinking foreground) D = Magenta (high intensity)
E = Brown (blinking foreground) E = Brown (high intensity)
F = White (blinking foreground) F = White (high intensity)
*****************************************************************************
The following is the contents of BBSLIST.BAT which nightly checks for any
additions and is provided as a basis from which you can construct your own.
@rem Bulletin #7 - BBS Listing and BBSLIST.ZIP
cd\WC30\ques
if not exist ques0001.001 goto ques2
copy ques0001.000+ques0001.001
copy ques0001.001 ques0001.flg
del ques0001.001
:ques2
if not exist ques0001.002 goto ques3
copy ques0001.000+ques0001.002
copy ques0001.002 ques0001.flg
del ques0001.002
:ques3
if not exist ques0001.003 goto ques4
copy ques0001.000+ques0001.003
copy ques0001.003 ques0001.flg
del ques0001.003
:ques4
if not exist ques0001.004 goto ques5
copy ques0001.000+ques0001.004
copy ques0001.004 ques0001.flg
del ques0001.004
:ques5
if not exist ques0001.005 goto ques6
copy ques0001.000+ques0001.005
copy ques0001.005 ques0001.flg
del ques0001.005
:ques6
if not exist ques0001.006 goto ques7
copy ques0001.000+ques0001.006
copy ques0001.006 ques0001.flg
del ques0001.006
:ques7
if not exist ques0001.007 goto ques8
copy ques0001.000+ques0001.007
copy ques0001.007 ques0001.flg
del ques0001.007
:ques8
if not exist ques0001.008 goto ques9
copy ques0001.000+ques0001.008
copy ques0001.008 ques0001.flg
del ques0001.008
:ques9
if not exist ques0001.009 goto ques10
copy ques0001.000+ques0001.009
copy ques0001.009 ques0001.flg
del ques0001.009
:ques10
if not exist ques0001.010 goto NEWSTART
copy ques0001.000+ques0001.010
copy ques0001.010 ques0001.flg
del ques0001.010
:NEWSTART
if not exist ques0001.flg goto END
bbslist
del ques0001.flg
g:
cd\generic\text
Pkzip -f bbslist
:END
A brief explanation of the major section is:
:HEADER1 (Label - HEADER1)
if not exist ques0001.0xx goto HEADER2 (If the questionaire for a indivdual
node was not answered, bypass the
rest of the instructions until the
label HEADER2 is found)
copy ques0001.000+ques0001.0xx (Append the contents of ques0001.0xx
to the permanent ques0001.000 data
file)
copy ques0001.0xx ques0001.flg (Copy data file to temporary flag
file, contents does not matter)
del ques0001.0xx (Clear data for that node)
:HEADER2 (Label - HEADER2)
*
*
*
*
:NEWSTART (Label - NEWSTART)
if not exist ques0001.flg go END (If the flag file does not exist
then terminate batch program)
bbslist (Execute program BBSLIST.EXE)
del ques0001.flg (Clear flag file)
*
*
:END
Hopefully I have documented everything sufficiently so that anyone can use
the program. Those of you who are professional programmers may scoff at
my coding all you want; but, what do you expect from a hardware designer who
had 30 minutes to kill. For those who wish to ridicule I can be reached at
Knight's Bridge BBS - (512)837-3617, (512)837-9781, (512)837-9816
For those who feel guilty and have this un-natural urge to send me money,
give the BBS a call and join up for a year ($5).